/ MacFormat 1995 May / macformat-024.iso / Demos / DTP / FrameMaker 4.0.4 / FrameMaker 4 rolling demo / Shared Cast / Shared Cast.rsrc / STXT_1416

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 0c 00 00 05 2b | 00 00 00 16 2d 2d 20 6d |.......+|....-- m|
|00000010| 75 6c 74 69 62 75 74 74 | 6f 6e 20 66 61 63 74 6f |ultibutt|on facto|
|00000020| 72 79 0d 66 61 63 74 6f | 72 79 20 6d 75 6c 74 69 |ry.facto|ry multi|
|00000030| 42 75 74 74 6f 6e 0d 6d | 65 74 68 6f 64 20 6d 4e |Button.m|ethod mN|
|00000040| 65 77 20 6e 75 6d 42 75 | 74 74 6f 6e 73 2c 20 62 |ew numBu|ttons, b|
|00000050| 75 74 74 6f 6e 53 70 72 | 69 74 65 2c 20 6e 6f 72 |uttonSpr|ite, nor|
|00000060| 6d 61 6c 43 61 73 74 2c | 0d 69 6e 73 74 61 6e 63 |malCast,|.instanc|
|00000070| 65 20 4e 42 75 74 74 6f | 6e 73 0d 69 6e 73 74 61 |e NButto|ns.insta|
|00000080| 6e 63 65 20 74 68 65 53 | 70 72 69 74 65 0d 69 6e |nce theS|prite.in|
|00000090| 73 74 61 6e 63 65 20 6e | 6f 72 6d 43 61 73 74 0d |stance n|ormCast.|
|000000a0| 69 6e 73 74 61 6e 63 65 | 20 62 75 74 74 6f 6e 57 |instance| buttonW|
|000000b0| 69 64 74 68 0d 73 65 74 | 20 4e 42 75 74 74 6f 6e |idth.set| NButton|
|000000c0| 73 20 3d 20 6e 75 6d 42 | 75 74 74 6f 6e 73 0d 73 |s = numB|uttons.s|
|000000d0| 65 74 20 74 68 65 53 70 | 72 69 74 65 20 3d 20 62 |et theSp|rite = b|
|000000e0| 75 74 74 6f 6e 53 70 72 | 69 74 65 0d 73 65 74 20 |uttonSpr|ite.set |
|000000f0| 6e 6f 72 6d 43 61 73 74 | 20 3d 20 6e 6f 72 6d 61 |normCast| = norma|
|00000100| 6c 43 61 73 74 0d 70 75 | 70 70 65 74 53 70 72 69 |lCast.pu|ppetSpri|
|00000110| 74 65 20 74 68 65 53 70 | 72 69 74 65 2c 20 74 72 |te theSp|rite, tr|
|00000120| 75 65 0d 73 65 74 20 62 | 75 74 74 6f 6e 57 69 64 |ue.set b|uttonWid|
|00000130| 74 68 20 3d 20 74 68 65 | 20 77 69 64 74 68 20 6f |th = the| width o|
|00000140| 66 20 73 70 72 69 74 65 | 20 74 68 65 53 70 72 69 |f sprite| theSpri|
|00000150| 74 65 20 2f 20 4e 42 75 | 74 74 6f 6e 73 0d 73 65 |te / NBu|ttons.se|
|00000160| 74 20 74 68 65 20 69 6d | 6d 65 64 69 61 74 65 20 |t the im|mediate |
|00000170| 6f 66 20 73 70 72 69 74 | 65 20 74 68 65 53 70 72 |of sprit|e theSpr|
|00000180| 69 74 65 20 3d 20 74 72 | 75 65 0d 65 6e 64 0d 0d |ite = tr|ue.end..|
|00000190| 6d 65 74 68 6f 64 20 6d | 53 65 74 53 74 61 72 74 |method m|SetStart|
|000001a0| 43 61 73 74 20 6e 6f 72 | 6d 61 6c 43 61 73 74 0d |Cast nor|malCast.|
|000001b0| 73 65 74 20 6e 6f 72 6d | 43 61 73 74 20 3d 20 6e |set norm|Cast = n|
|000001c0| 6f 72 6d 61 6c 43 61 73 | 74 0d 73 65 74 20 62 75 |ormalCas|t.set bu|
|000001d0| 74 74 6f 6e 57 69 64 74 | 68 20 3d 20 74 68 65 20 |ttonWidt|h = the |
|000001e0| 77 69 64 74 68 20 6f 66 | 20 73 70 72 69 74 65 20 |width of| sprite |
|000001f0| 74 68 65 53 70 72 69 74 | 65 20 2f 20 4e 42 75 74 |theSprit|e / NBut|
|00000200| 74 6f 6e 73 0d 73 65 74 | 20 74 68 65 20 63 61 73 |tons.set| the cas|
|00000210| 74 4e 75 6d 20 6f 66 20 | 73 70 72 69 74 65 20 74 |tNum of |sprite t|
|00000220| 68 65 53 70 72 69 74 65 | 20 3d 20 6e 6f 72 6d 43 |heSprite| = normC|
|00000230| 61 73 74 0d 70 75 70 70 | 65 74 54 72 61 6e 73 69 |ast.pupp|etTransi|
|00000240| 74 69 6f 6e 20 30 0d 75 | 70 64 61 74 65 53 74 61 |tion 0.u|pdateSta|
|00000250| 67 65 0d 65 6e 64 0d 0d | 6d 65 74 68 6f 64 20 6d |ge.end..|method m|
|00000260| 48 69 74 0d 20 20 73 65 | 74 20 77 68 69 63 68 4f |Hit.  se|t whichO|
|00000270| 6e 65 20 3d 20 28 74 68 | 65 20 6d 6f 75 73 65 48 |ne = (th|e mouseH|
|00000280| 20 2d 20 74 68 65 20 6c | 65 66 74 20 6f 66 20 73 | - the l|eft of s|
|00000290| 70 72 69 74 65 20 74 68 | 65 53 70 72 69 74 65 29 |prite th|eSprite)|
|000002a0| 2f 62 75 74 74 6f 6e 57 | 69 64 74 68 20 2b 20 31 |/buttonW|idth + 1|
|000002b0| 0d 20 20 70 75 70 70 65 | 74 54 72 61 6e 73 69 74 |.  puppe|tTransit|
|000002c0| 69 6f 6e 20 30 0d 20 20 | 70 75 70 70 65 74 53 6f |ion 0.  |puppetSo|
|000002d0| 75 6e 64 20 22 6d 6f 75 | 73 65 20 64 6f 77 6e 22 |und "mou|se down"|
|000002e0| 0d 20 20 73 65 74 20 74 | 68 65 20 63 61 73 74 4e |.  set t|he castN|
|000002f0| 75 6d 20 6f 66 20 73 70 | 72 69 74 65 20 74 68 65 |um of sp|rite the|
|00000300| 53 70 72 69 74 65 20 3d | 20 6e 6f 72 6d 43 61 73 |Sprite =| normCas|
|00000310| 74 20 2b 20 77 68 69 63 | 68 4f 6e 65 0d 20 20 75 |t + whic|hOne.  u|
|00000320| 70 64 61 74 65 53 74 61 | 67 65 0d 20 20 72 65 70 |pdateSta|ge.  rep|
|00000330| 65 61 74 20 77 68 69 6c | 65 20 74 68 65 20 6d 6f |eat whil|e the mo|
|00000340| 75 73 65 44 6f 77 6e 0d | 20 20 20 20 69 66 20 72 |useDown.|    if r|
|00000350| 6f 6c 6c 6f 76 65 72 28 | 74 68 65 53 70 72 69 74 |ollover(|theSprit|
|00000360| 65 29 20 74 68 65 6e 0d | 20 20 20 20 20 20 73 65 |e) then.|      se|
|00000370| 74 20 74 68 65 20 63 61 | 73 74 4e 75 6d 20 6f 66 |t the ca|stNum of|
|00000380| 20 73 70 72 69 74 65 20 | 74 68 65 53 70 72 69 74 | sprite |theSprit|
|00000390| 65 20 3d 20 6e 6f 72 6d | 43 61 73 74 20 2b 20 77 |e = norm|Cast + w|
|000003a0| 68 69 63 68 4f 6e 65 0d | 20 20 20 20 65 6c 73 65 |hichOne.|    else|
|000003b0| 0d 20 20 20 20 20 20 73 | 65 74 20 74 68 65 20 63 |.      s|et the c|
|000003c0| 61 73 74 4e 75 6d 20 6f | 66 20 73 70 72 69 74 65 |astNum o|f sprite|
|000003d0| 20 74 68 65 53 70 72 69 | 74 65 20 3d 20 6e 6f 72 | theSpri|te = nor|
|000003e0| 6d 43 61 73 74 0d 20 20 | 20 20 65 6e 64 20 69 66 |mCast.  |  end if|
|000003f0| 0d 20 20 20 20 75 70 64 | 61 74 65 53 74 61 67 65 |.    upd|ateStage|
|00000400| 0d 20 20 65 6e 64 20 72 | 65 70 65 61 74 0d 20 20 |.  end r|epeat.  |
|00000410| 70 75 70 70 65 74 53 6f | 75 6e 64 20 22 6d 6f 75 |puppetSo|und "mou|
|00000420| 73 65 20 75 70 22 0d 20 | 20 75 70 64 61 74 65 53 |se up". | updateS|
|00000430| 74 61 67 65 0d 20 20 70 | 75 70 70 65 74 53 6f 75 |tage.  p|uppetSou|
|00000440| 6e 64 20 30 0d 20 20 73 | 65 74 20 74 68 65 20 63 |nd 0.  s|et the c|
|00000450| 61 73 74 4e 75 6d 20 6f | 66 20 73 70 72 69 74 65 |astNum o|f sprite|
|00000460| 20 74 68 65 53 70 72 69 | 74 65 20 3d 20 6e 6f 72 | theSpri|te = nor|
|00000470| 6d 43 61 73 74 0d 20 20 | 75 70 64 61 74 65 53 74 |mCast.  |updateSt|
|00000480| 61 67 65 0d 20 20 69 66 | 20 72 6f 6c 6c 6f 76 65 |age.  if| rollove|
|00000490| 72 28 74 68 65 53 70 72 | 69 74 65 29 20 74 68 65 |r(theSpr|ite) the|
|000004a0| 6e 0d 20 20 20 20 72 65 | 74 75 72 6e 20 77 68 69 |n.    re|turn whi|
|000004b0| 63 68 4f 6e 65 0d 20 20 | 65 6c 73 65 0d 20 20 20 |chOne.  |else.   |
|000004c0| 20 72 65 74 75 72 6e 20 | 30 0d 20 20 65 6e 64 20 | return |0.  end |
|000004d0| 69 66 0d 65 6e 64 0d 0d | 6d 65 74 68 6f 64 20 6d |if.end..|method m|
|000004e0| 43 6c 65 61 72 0d 20 20 | 73 65 74 20 74 68 65 20 |Clear.  |set the |
|000004f0| 63 61 73 74 4e 75 6d 20 | 6f 66 20 73 70 72 69 74 |castNum |of sprit|
|00000500| 65 20 74 68 65 53 70 72 | 69 74 65 20 3d 20 30 0d |e theSpr|ite = 0.|
|00000510| 20 20 70 75 70 70 65 74 | 54 72 61 6e 73 69 74 69 |  puppet|Transiti|
|00000520| 6f 6e 20 30 0d 20 20 75 | 70 64 61 74 65 53 74 61 |on 0.  u|pdateSta|
|00000530| 67 65 0d 65 6e 64 0d 00 | 01 00 00 00 00 00 0d 00 |ge.end..|........|
|00000540| 0a 00 03 00 00 00 0a 00 | 00 00 00 00 00          |........|.....   |
+--------+-------------------------+-------------------------+--------+--------+